home *** CD-ROM | disk | FTP | other *** search
/ Amiga CD-Sensation: Golden Games / Amiga CD-Sensation - Ausgabe 2 - Golden Games (1996)(GTI - Schatztruhe)(DE)[!].iso / Adventurer's / ImpPro / Scripts / Demo.character < prev    next >
Text File  |  1995-05-03  |  344b  |  32 lines
  1. /* Sample script for the character module */
  2.  
  3. options results
  4. address IMPCHAR.1
  5.  
  6. STATUS stat
  7.  
  8. say stat.NUMCHARS
  9. say stat.SELECTED
  10. say stat.CHARLEN
  11.  
  12. SELECTCHAR 0
  13. GETCHAR char
  14.  
  15. lim = stat.CHARLEN - 1
  16.  
  17. do i = 0 to lim
  18.    say char.i
  19. end
  20.  
  21. ADDCHAR
  22. charnum = RESULT
  23.  
  24. SELECTCHAR charnum
  25. GETCHAR char
  26.  
  27. char.0 = "AREXX"
  28.  
  29. LOCKLIST
  30. PUTCHAR char
  31. UNLOCKLIST
  32.